home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / CODING / MISC / ADA_TUT3.ZIP / TOMORROW.DUM < prev    next >
Encoding:
Text File  |  1994-08-22  |  155 b   |  7 lines
  1. -- Dummy solution to Outside Assignment 3
  2. separate (Nextdate)
  3. function Tomorrow(Today : in Date) return Date is
  4. begin
  5.    return Today;
  6. end Tomorrow;
  7.